﻿using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Security.Cryptography;

namespace UnionPay4WP
{
    public class DES3 : IDES3
    {

        private readonly int ENCRYPT = 1;
        private readonly int DECRYPT = 2;

        private uint[] KnL = new uint[32];

        /// <summary>
        /// 字节数组转16进制字符串
        /// </summary>
        /// <param name="bytes"></param>
        /// <returns></returns>
        public static string byteToHexStr(byte[] bytes)
        {
            string returnStr = "";
            if (bytes != null)
            {
                for (int i = 0; i < bytes.Length; i++)
                {
                    returnStr += bytes[i].ToString("X2");
                }
            }
            return returnStr;
        }
        /*
        public static string Hex2String(byte[] bytes)
        {
            StringBuilder hexBuilder = new StringBuilder();
            foreach (byte b in bytes)
            {
                hexBuilder.Append(b.ToString("X"));
            }
            return hexBuilder.ToString();
        }
        */
        //循环取两位16进制字符，转为字节放入字节数组   
        public static byte[] Hex2ByteArr(string src)
        {
            int len = src.Length / 2;
            byte[] arr = new byte[len];
            for (int i = 0; i < len; i++)
            {
                arr[i] = Convert.ToByte(src.Substring(i * 2, 2), 16);
            }
            return arr;
        }
        public static byte[] Hex2ByteArr2(string hex)
        {
            return Enumerable.Range(0, hex.Length)
                             .Where(x => x % 2 == 0)
                             .Select(x => Convert.ToByte(hex.Substring(x, 2), 16))
                             .ToArray();
        }
        //Conv转换函数   
        public static string Hex2Str(string strSrc)
        {
            byte[] buffer = Hex2ByteArr(strSrc);
            return System.Text.Encoding.UTF8.GetString(buffer,0,buffer.Length);
        }
        public byte[] Combine(byte[] a1, byte[] a2)
        {
            if (a1 == null)
                return a2;
            if (a2 == null)
                return a1;
            byte[] ret = new byte[a1.Length + a2.Length];
            Array.Copy(a1, 0, ret, 0, a1.Length);
            Array.Copy(a2, 0, ret, a1.Length, a2.Length);

            return ret;
        }

        private int extend(int size)
        {
            return ((size / 8 + 1) * 8);
        }



        private void debug(uint[] obj, int len)
        {
            for (int iii = 0; iii < len; iii++)
            {
                Console.Write(" {0} ", obj[iii]);
            }
           // Console.ReadKey();

        }

        public byte[] GenerateKey()
        {


            RandomNumberGenerator rnd = new RNGCryptoServiceProvider();
            byte[] Ftmp = new byte[16];
            // Fill with random data
            rnd.GetBytes(Ftmp);
            //string key = "1234567890asdfgh";
            
            //string temp = System.Text.Encoding.UTF8.GetString(Ftmp,0,Ftmp.Length) ;
            //return System.Text.Encoding.UTF8.GetBytes(key);

            // Make the key good
            //Ftmp = MakeGoodTripleDesKey(Ftmp);
            // Call sibling function
            return Ftmp;
        }
/*BLUES:这下面的三个函数作用是一样的，暂时分别用来转换8->16位、16->32位、24->48位，麻烦Blues来统一一下啦~~*/
        public string EncryptCheckCode(string checkCode, byte[] key)
        {
            byte[] indata = Encoding.UTF8.GetBytes(checkCode);
            byte[] padIndata = new byte[8];
            byte[] padIndata1 = new byte[8];
            
            if (indata.Length < 16)
            {
                Array.Copy(indata, 0, padIndata, 0, indata.Length);
                Array.Copy(padIndata, 0, padIndata1, 0, 8);
                
            }
            byte[] outdata1 = null;
            
            DES3 des3 = new DES3();
            bool bo = des3.DesTripleEncrypt(key, padIndata1, out outdata1);
            
            string hexStr = DES3.byteToHexStr(outdata1);
            
            return hexStr;
        }
        //return Hex
        public string EncryptMobilePhoneNum(string num, byte[] key)
        {
            byte[] indata = Encoding.UTF8.GetBytes(num);
            byte[] padIndata = new byte[16];// { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
            byte[] padIndata1 = new byte[8];
            byte[] padIndata2 = new byte[8];
            if (indata.Length < 16)
            {
                Array.Copy(indata, 0, padIndata, 0, indata.Length);
                Array.Copy(padIndata, 0, padIndata1, 0, 8);
                Array.Copy(padIndata, 8, padIndata2, 0, 8);
            }
            byte[] outdata1 = null;
            byte[] outdata2 = null;
            DES3 des3 = new DES3();
            bool bo = des3.DesTripleEncrypt(key, padIndata1, out outdata1);
            bo = des3.DesTripleEncrypt(key, padIndata2, out outdata2);
            Console.WriteLine("key:{0:X}", string.Join(",", key));
            Console.WriteLine("明文数据:{0}", string.Join(",", indata));
            string hexStr=DES3.byteToHexStr(des3.Combine(outdata1, outdata2));
            Console.WriteLine("加密数据:{0}", string.Join(",", hexStr));
            return hexStr;
        }


        public string EncryptAccountNum(string num, byte[] key)
        {
            byte[] indata = Encoding.UTF8.GetBytes(num);
            byte[] padIndata = new byte[24];// { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
            byte[] padIndata1 = new byte[8];
            byte[] padIndata2 = new byte[8];
            byte[] padIndata3 = new byte[8];
            if (indata.Length < 24)
            {
                Array.Copy(indata, 0, padIndata, 0, indata.Length);
                Array.Copy(padIndata, 0, padIndata1, 0, 8);
                Array.Copy(padIndata, 8, padIndata2, 0, 8);
                Array.Copy(padIndata, 16, padIndata3, 0, 8);
            }
            byte[] outdata1 = null;
            byte[] outdata2 = null;
            byte[] outdata3 = null;
            DES3 des3 = new DES3();
            bool bo = des3.DesTripleEncrypt(key, padIndata1, out outdata1);
            bo = des3.DesTripleEncrypt(key, padIndata2, out outdata2);
            bo = des3.DesTripleEncrypt(key, padIndata3, out outdata3);
            Console.WriteLine("key:{0:X}", string.Join(",", key));
            Console.WriteLine("明文数据:{0}", string.Join(",", indata));
            string hexStr = DES3.byteToHexStr(des3.Combine(des3.Combine(outdata1, outdata2),outdata3));
            Console.WriteLine("加密数据:{0}", string.Join(",", hexStr));
            return hexStr;
        }

        //40
        public string Encrypt40(string num, byte[] key)
        {
            byte[] indata = Encoding.UTF8.GetBytes(num);
            byte[] padIndata = new byte[40];// { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
            byte[] padIndata1 = new byte[8];

            byte[] outdata1 = null;
            byte[] outTemp = null;

            DES3 des3 = new DES3();
            bool bo = false;
            Array.Copy(indata, 0, padIndata, 0, indata.Length);
            for (int i = 0; i < 5; i++)
            {
                Array.Copy(padIndata, i*8, padIndata1, 0, 8);
                bo = des3.DesTripleEncrypt(key, padIndata1, out outdata1);
                outTemp = des3.Combine(outTemp,outdata1);
                Console.WriteLine("key:{0:X}", string.Join(",", key));
                Console.WriteLine("明文数据:{0}", string.Join(",", indata));
                
            }
            string hexStr = DES3.byteToHexStr(outTemp);
            Console.WriteLine("加密数据:{0}", string.Join(",", hexStr));
            return hexStr;
        }
        public string Decrypt40(byte[] indata, byte[] key)
        {
           // byte[] indata = Encoding.UTF8.GetBytes(inStr);
            //byte[] padIndata = new byte[40];// { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
            byte[] padIndata1 = new byte[8];

            byte[] outdata1 = null;
            byte[] outTemp = null;

            DES3 des3 = new DES3();
            bool bo = false;
            for (int i = 0; i < 5; i++)
            {
                Array.Copy(indata, i * 8, padIndata1, 0, 8);
                bo = des3.DesTripleDecrypt(key, padIndata1, out outdata1);
                outTemp = des3.Combine(outTemp,outdata1);
                Console.WriteLine("key:{0:X}", string.Join(",", key));
                Console.WriteLine("明文数据:{0}", string.Join(",", indata));
                
            }
            string hexStr = DES3.byteToHexStr(outTemp);
            Console.WriteLine("加密数据:{0}", string.Join(",", hexStr));
            //outdata = outTemp;
            return hexStr;
        }

        public bool DesTripleEncrypt(byte[] key, byte[] indata, out byte[] outdata)
        {
            if (indata == null)
            {
                outdata = null;
                return false;
            }
            byte[] key1 = key.Take(8).ToArray();
            byte[] key2 = key.Skip(8).Take(8).ToArray();

            byte[] _out;
            DesEncrypt(key1, indata,  out _out);
              DesDecrypt(key2, _out,out _out);
              DesEncrypt(key1, _out, out _out);
              outdata = _out;
            return true;

        }

        public bool DesTripleDecrypt(byte[] key, byte[] indata, out byte[] outdata)
        {
            

            if (indata == null)
            {
                outdata = null;
                return false;
            }
            byte[] key1 =key.Take(8).ToArray();
            byte[] key2 = key.Skip(8).Take(8).ToArray();

            byte[] _out;
            DesDecrypt(key1, indata,out _out);
            DesEncrypt(key2, _out, out _out);
            DesDecrypt(key1, _out,out _out);
            outdata = _out;
            return true;
        }

        public bool DesEncrypt(byte[] key, byte[] indata, out byte[] outdata)
        {
            if (indata == null)
            {
                outdata = null;
                return false;
            }

            deskey(key, ENCRYPT);
            
            byte[] _out = new byte[8];
            des(new Point<byte>(indata), new Point<byte>(_out));
            outdata = _out;
            return true;
        }

        public bool DesDecrypt(byte[] key, byte[] indata, out byte[] outdata)
        {
            if (indata == null)
            {
                outdata = null;
                return false;
            }

            deskey (key, DECRYPT );
            byte[] _out = new byte[8];
            des (new Point<byte>( indata), new Point<byte>(_out));
            outdata = _out;
            return true;
        }

        void des(Point<byte> _in, Point<byte> _out)
        {
            des_block(_in, _out);
        }


        void des_block(Point<byte> _in, Point<byte> _out)
        {
            //unsigned long work[2];
            uint[] _work = new uint[2];
            Point<uint> work = new Point<uint>(_work);
            scrunch(_in, work);
            desfunc(work, new Point<uint>( KnL));
            unscrun(work, _out);
        }


        void deskey(byte[] key, int md)  /* Thanks to James Gillogly &amp; Phil Karn! */
        {
       
              byte[]  Df_Key = new byte[24]  {
                   0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef,
                   0xfe, 0xdc, 0xba, 0x98, 0x76, 0x54, 0x32, 0x10,
                   0x89, 0xab, 0xcd, 0xef, 0x01, 0x23, 0x45, 0x67 };

            //ushort[] bytebit =  new ushort[8]  {
            //       0200, 0100, 040, 020, 010, 04, 02, 01 };
              ushort[] bytebit = new ushort[8]  {
                     128,64,32,16,8,4,2,1 };

            uint[] bigbyte  = new uint[24]  {
                   0x800000, 0x400000, 0x200000, 0x100000,
                   0x80000,  0x40000,  0x20000,  0x10000,
                   0x8000,   0x4000,   0x2000,   0x1000,
                   0x800,    0x400,    0x200,    0x100,
                   0x80,     0x40,     0x20,     0x10,
                   0x8,      0x4,      0x2,      0x1   };

            byte[]  pc1 = new byte[56] {
                   56, 48, 40, 32, 24, 16,  8,  0, 57, 49, 41, 33, 25, 17,
                    9,  1, 58, 50, 42, 34, 26, 18, 10,  2, 59, 51, 43, 35,
                   62, 54, 46, 38, 30, 22, 14,  6, 61, 53, 45, 37, 29, 21,
                   13,  5, 60, 52, 44, 36, 28, 20, 12,  4, 27, 19, 11, 3   };

            byte[] totrot  = new byte[16]  {
                   1, 2, 4, 6, 8, 10, 12, 14, 15, 17, 19, 21, 23, 25, 27, 28 };

            byte[] pc2 = new byte[48]  {
                   13, 16, 10, 23,  0,  4,      2, 27, 14,  5, 20,  9,
                   22, 18, 11,  3, 25,  7,     15,  6, 26, 19, 12,  1,
                   40, 51, 30, 36, 46, 54,     29, 39, 50, 44, 32, 47,
                   43, 48, 38, 55, 33, 52,     45, 41, 49, 35, 28, 31   };

             int i, j, l, m, n;
            //  unsigned char pc1m[56], pcr[56];
            //  unsigned long kn[32];
             byte[] pc1m = new byte[56];
             byte[] pcr = new byte[56];
             uint[] _kn = new uint[32];
             Point<uint> kn = new Point<uint>(_kn);
          
             for (j = 0; j < 56; j++)
             {
                 l = pc1[j];
                 m = l & 07; 
                 pc1m[j] = (key[l >> 3] & bytebit[m]) != (byte)0 ? (byte)1 : (byte)0;
             }
             for (i = 0; i < 16; i++)
             {
                 if (md == DECRYPT) m = (15 - i) << 1;
                 else m = i << 1;
                 n = m + 1;
                 kn[m] = kn[n] = 0;
                 for (j = 0; j < 28; j++)
                 {
                     l = j + totrot[i];
                     if (l < 28) pcr[j] = pc1m[l];
                     else pcr[j] = pc1m[l - 28];
                 }
                 for (j = 28; j < 56; j++)
                 {
                     l = j + totrot[i];
                     if (l < 56) pcr[j] = pc1m[l];
                     else pcr[j] = pc1m[l - 28];
                 }
                 for (j = 0; j < 24; j++)
                 {
                     if (pcr[pc2[j]] != 0) kn[m] |= bigbyte[j];
                     if (pcr[pc2[j + 24]] != 0) kn[n] |= bigbyte[j];
                 }
             }
        
             cookey( kn); 
        }




        private void cookey(Point<uint> raw1)
        {
            //register unsigned long *cook, *raw0;
            //unsigned long dough[32];
            //register int i;
            uint[] _dough = new uint[32];
            Point<uint> dough = new Point<uint>(_dough);

            Point<uint> cook = dough.Clone();
            Point<uint> raw0;
            for (int i = 0; i < 16; i++, raw1++)
            {
                raw0 = raw1.Clone(); raw1++;
                cook.Now  = (raw0.Now & 0x00fc0000) << 6;
                cook.Now  |= (raw0.Now & 0x00000fc0) << 10;
                cook.Now  |= (raw1.Now & 0x00fc0000) >> 10;
                cook.Now |= (raw1.Now & 0x00000fc0) >> 6; cook++;
                cook.Now  = (raw0.Now & 0x0003f000) << 12;
                cook.Now |= (raw0.Now & 0x0000003f) << 16;
                cook.Now |= (raw1.Now & 0x0003f000) >> 4;
                cook.Now |= (raw1.Now & 0x0000003f);cook++; 
            }
            usekey(dough);

            //cook = dough;
            //for (i = 0; i < 16; i++, raw1++) {
            //  raw0 = raw1++;
            //  *cook = (*raw0 & 0x00fc0000L) << 6;
            //  *cook |= (*raw0 & 0x00000fc0L) << 10;
            //  *cook |= (*raw1 & 0x00fc0000L) >> 10;
            //  *cook++ |= (*raw1 & 0x00000fc0L) >> 6;
            //  *cook = (*raw0 & 0x0003f000L) << 12;
            //  *cook |= (*raw0 & 0x0000003fL) << 16;
            //  *cook |= (*raw1 & 0x0003f000L) >> 4;
            //  *cook++ |= (*raw1 & 0x0000003fL);
            //}
            //usekey(dough);
            //return;
        }



        private void usekey(Point<uint> p)
        {
            int to, end;
            to = 0; end = 32;
            while (to < end)
            {

                KnL[to++] = p.Now;
                p++;
            }
        }




        private void scrunch(Point<byte> outof, Point<uint> into)
        {
            into.Now =(uint) (outof.Now & 0xff) << 24; outof++;

            into.Now |= (uint)(outof.Now & 0xff) << 16; outof++;
            into.Now |= (uint)(outof.Now & 0xff) << 8; outof++;

            into.Now |= (uint)(outof.Now & 0xff); outof++; into++;

            into.Now = (uint)(outof.Now & 0xff) << 24; outof++;
            into.Now |= (uint)(outof.Now & 0xff) << 16; outof++;
            into.Now |= (uint)(outof.Now & 0xff) << 8; outof++;
            into.Now |= (uint)(outof.Now & 0xff);

            //*into = (*outof++ & 0xffL) << 24;
            //*into |= (*outof++ & 0xffL) << 16;
            //*into |= (*outof++ & 0xffL) << 8;
            //*into++ |= (*outof++ & 0xffL);
            //*into = (*outof++ & 0xffL) << 24;
            //*into |= (*outof++ & 0xffL) << 16;
            //*into |= (*outof++ & 0xffL) << 8;
            //*into |= (*outof & 0xffL);
            return;
        }


        private void unscrun(Point<uint> outof, Point<byte>into)
        {
            //*into++ = (*outof >> 24) & 0xffL;
            //*into++ = (*outof >> 16) & 0xffL;
            //*into++ = (*outof >> 8) & 0xffL;
            //*into++ = *outof++ & 0xffL;
            //*into++ = (*outof >> 24) & 0xffL;
            //*into++ = (*outof >> 16) & 0xffL;
            //*into++ = (*outof >> 8) & 0xffL;
            //*into = *outof & 0xffL;
            into.Now =(byte) ((outof.Now >> 24) & 0xff); into++;
            into.Now =(byte) ( (outof.Now >> 16) & 0xff); into++;
            into.Now =(byte) ( (outof.Now >> 8) & 0xff); into++;
            into.Now =(byte) ( (outof.Now) & 0xff); outof++; into++;
            into.Now = (byte) ((outof.Now >> 24) & 0xff); into++;
            into.Now =(byte) ( (outof.Now >> 16) & 0xff); into++;
            into.Now =(byte) ( (outof.Now >> 8) & 0xff); into++;
            into.Now =(byte) ( (outof.Now) & 0xff);


            return;
        }

        private void desfunc(Point<uint> block, Point<uint> keys)
        {
            uint[] SP1 = new uint[64] {
       0x01010400, 0x00000000, 0x00010000, 0x01010404,
       0x01010004, 0x00010404, 0x00000004, 0x00010000,
       0x00000400, 0x01010400, 0x01010404, 0x00000400,
       0x01000404, 0x01010004, 0x01000000, 0x00000004,
       0x00000404, 0x01000400, 0x01000400, 0x00010400,
       0x00010400, 0x01010000, 0x01010000, 0x01000404,
       0x00010004, 0x01000004, 0x01000004, 0x00010004,
       0x00000000, 0x00000404, 0x00010404, 0x01000000,
       0x00010000, 0x01010404, 0x00000004, 0x01010000,
       0x01010400, 0x01000000, 0x01000000, 0x00000400,
       0x01010004, 0x00010000, 0x00010400, 0x01000004,
       0x00000400, 0x00000004, 0x01000404, 0x00010404,
       0x01010404, 0x00010004, 0x01010000, 0x01000404,
       0x01000004, 0x00000404, 0x00010404, 0x01010400,
       0x00000404, 0x01000400, 0x01000400, 0x00000000,
       0x00010004, 0x00010400, 0x00000000, 0x01010004  };

            uint[] SP2 = new uint[64]{
       0x80108020, 0x80008000, 0x00008000, 0x00108020,
       0x00100000, 0x00000020, 0x80100020, 0x80008020,
       0x80000020, 0x80108020, 0x80108000, 0x80000000,
       0x80008000, 0x00100000, 0x00000020, 0x80100020,
       0x00108000, 0x00100020, 0x80008020, 0x00000000,
       0x80000000, 0x00008000, 0x00108020, 0x80100000,
       0x00100020, 0x80000020, 0x00000000, 0x00108000,
       0x00008020, 0x80108000, 0x80100000, 0x00008020,
       0x00000000, 0x00108020, 0x80100020, 0x00100000,
       0x80008020, 0x80100000, 0x80108000, 0x00008000,
       0x80100000, 0x80008000, 0x00000020, 0x80108020,
       0x00108020, 0x00000020, 0x00008000, 0x80000000,
       0x00008020, 0x80108000, 0x00100000, 0x80000020,
       0x00100020, 0x80008020, 0x80000020, 0x00100020,
       0x00108000, 0x00000000, 0x80008000, 0x00008020,
       0x80000000, 0x80100020, 0x80108020, 0x00108000  };


            uint[] SP3 = new uint[64] {
       0x00000208, 0x08020200, 0x00000000, 0x08020008,
       0x08000200, 0x00000000, 0x00020208, 0x08000200,
       0x00020008, 0x08000008, 0x08000008, 0x00020000,
       0x08020208, 0x00020008, 0x08020000, 0x00000208,
       0x08000000, 0x00000008, 0x08020200, 0x00000200,
       0x00020200, 0x08020000, 0x08020008, 0x00020208,
       0x08000208, 0x00020200, 0x00020000, 0x08000208,
       0x00000008, 0x08020208, 0x00000200, 0x08000000,
       0x08020200, 0x08000000, 0x00020008, 0x00000208,
       0x00020000, 0x08020200, 0x08000200, 0x00000000,
       0x00000200, 0x00020008, 0x08020208, 0x08000200,
       0x08000008, 0x00000200, 0x00000000, 0x08020008,
       0x08000208, 0x00020000, 0x08000000, 0x08020208,
       0x00000008, 0x00020208, 0x00020200, 0x08000008,
       0x08020000, 0x08000208, 0x00000208, 0x08020000,
       0x00020208, 0x00000008, 0x08020008, 0x00020200  };
            uint[] SP4 = new uint[64]{
       0x00802001, 0x00002081, 0x00002081, 0x00000080,
       0x00802080, 0x00800081, 0x00800001, 0x00002001,
       0x00000000, 0x00802000, 0x00802000, 0x00802081,
       0x00000081, 0x00000000, 0x00800080, 0x00800001,
       0x00000001, 0x00002000, 0x00800000, 0x00802001,
       0x00000080, 0x00800000, 0x00002001, 0x00002080,
       0x00800081, 0x00000001, 0x00002080, 0x00800080,
       0x00002000, 0x00802080, 0x00802081, 0x00000081,
       0x00800080, 0x00800001, 0x00802000, 0x00802081,
       0x00000081, 0x00000000, 0x00000000, 0x00802000,
       0x00002080, 0x00800080, 0x00800081, 0x00000001,
       0x00802001, 0x00002081, 0x00002081, 0x00000080,
       0x00802081, 0x00000081, 0x00000001, 0x00002000,
       0x00800001, 0x00002001, 0x00802080, 0x00800081,
       0x00002001, 0x00002080, 0x00800000, 0x00802001,
       0x00000080, 0x00800000, 0x00002000, 0x00802080  };

            uint[] SP5 = new uint[64] {
       0x00000100, 0x02080100, 0x02080000, 0x42000100,
       0x00080000, 0x00000100, 0x40000000, 0x02080000,
       0x40080100, 0x00080000, 0x02000100, 0x40080100,
       0x42000100, 0x42080000, 0x00080100, 0x40000000,
       0x02000000, 0x40080000, 0x40080000, 0x00000000,
       0x40000100, 0x42080100, 0x42080100, 0x02000100,
       0x42080000, 0x40000100, 0x00000000, 0x42000000,
       0x02080100, 0x02000000, 0x42000000, 0x00080100,
       0x00080000, 0x42000100, 0x00000100, 0x02000000,
       0x40000000, 0x02080000, 0x42000100, 0x40080100,
       0x02000100, 0x40000000, 0x42080000, 0x02080100,
       0x40080100, 0x00000100, 0x02000000, 0x42080000,
       0x42080100, 0x00080100, 0x42000000, 0x42080100,
       0x02080000, 0x00000000, 0x40080000, 0x42000000,
       0x00080100, 0x02000100, 0x40000100, 0x00080000,
       0x00000000, 0x40080000, 0x02080100, 0x40000100  };

            uint[] SP6 = new uint[64] {
       0x20000010, 0x20400000, 0x00004000, 0x20404010,
       0x20400000, 0x00000010, 0x20404010, 0x00400000,
       0x20004000, 0x00404010, 0x00400000, 0x20000010,
       0x00400010, 0x20004000, 0x20000000, 0x00004010,
       0x00000000, 0x00400010, 0x20004010, 0x00004000,
       0x00404000, 0x20004010, 0x00000010, 0x20400010,
       0x20400010, 0x00000000, 0x00404010, 0x20404000,
       0x00004010, 0x00404000, 0x20404000, 0x20000000,
       0x20004000, 0x00000010, 0x20400010, 0x00404000,
       0x20404010, 0x00400000, 0x00004010, 0x20000010,
       0x00400000, 0x20004000, 0x20000000, 0x00004010,
       0x20000010, 0x20404010, 0x00404000, 0x20400000,
       0x00404010, 0x20404000, 0x00000000, 0x20400010,
       0x00000010, 0x00004000, 0x20400000, 0x00404010,
       0x00004000, 0x00400010, 0x20004010, 0x00000000,
       0x20404000, 0x20000000, 0x00400010, 0x20004010  };

            uint[] SP7 = new uint[64] {
       0x00200000, 0x04200002, 0x04000802, 0x00000000,
       0x00000800, 0x04000802, 0x00200802, 0x04200800,
       0x04200802, 0x00200000, 0x00000000, 0x04000002,
       0x00000002, 0x04000000, 0x04200002, 0x00000802,
       0x04000800, 0x00200802, 0x00200002, 0x04000800,
       0x04000002, 0x04200000, 0x04200800, 0x00200002,
       0x04200000, 0x00000800, 0x00000802, 0x04200802,
       0x00200800, 0x00000002, 0x04000000, 0x00200800,
       0x04000000, 0x00200800, 0x00200000, 0x04000802,
       0x04000802, 0x04200002, 0x04200002, 0x00000002,
       0x00200002, 0x04000000, 0x04000800, 0x00200000,
       0x04200800, 0x00000802, 0x00200802, 0x04200800,
       0x00000802, 0x04000002, 0x04200802, 0x04200000,
       0x00200800, 0x00000000, 0x00000002, 0x04200802,
       0x00000000, 0x00200802, 0x04200000, 0x00000800,
       0x04000002, 0x04000800, 0x00000800, 0x00200002  };

            uint[] SP8 = new uint[64] {
       0x10001040, 0x00001000, 0x00040000, 0x10041040,
       0x10000000, 0x10001040, 0x00000040, 0x10000000,
       0x00040040, 0x10040000, 0x10041040, 0x00041000,
       0x10041000, 0x00041040, 0x00001000, 0x00000040,
       0x10040000, 0x10000040, 0x10001000, 0x00001040,
       0x00041000, 0x00040040, 0x10040040, 0x10041000,
       0x00001040, 0x00000000, 0x00000000, 0x10040040,
       0x10000040, 0x10001000, 0x00041040, 0x00040000,
       0x00041040, 0x00040000, 0x10041000, 0x00001000,
       0x00000040, 0x10040040, 0x00001000, 0x00041040,
       0x10001000, 0x00000040, 0x10000040, 0x10040000,
       0x10040040, 0x10000000, 0x00040000, 0x10001040,
       0x00000000, 0x10041040, 0x00040040, 0x10000040,
       0x10040000, 0x10001000, 0x10001040, 0x00000000,
       0x10041040, 0x00041000, 0x00041000, 0x00001040,
       0x00001040, 0x00040040, 0x10000000, 0x10041000  };

            uint fval, work, right, leftt;
            uint round;

            leftt = block[0];
            right = block[1];
            work = ((leftt >> 4) ^ right) & 0x0f0f0f0f;
            right ^= work;
            leftt ^= (work << 4);
            
            work = ((leftt >> 16) ^ right) & 0x0000ffff;
            right ^= work;
            leftt ^= (work << 16);
            work = ((right >> 2) ^ leftt) & 0x33333333;
            leftt ^= work;
            right ^= (work << 2);
            work = ((right >> 8) ^ leftt) & 0x00ff00ff;
            leftt ^= work;
            right ^= (work << 8);
            right = ((right << 1) | ((right >> 31) & 1)) & 0xffffffff;
            work = (leftt ^ right) & 0xaaaaaaaa;
            leftt ^= work;
            right ^= work;
            leftt = ((leftt << 1) | ((leftt >> 31) & 1)) & 0xffffffff;

            for (round = 0; round < 8; round++)
            {
                work = (right << 28) | (right >> 4);
                //work ^= *keys++;
                work ^= keys.Now; keys++;
                fval = SP7[work & 0x3f];
                fval |= SP5[(work >> 8) & 0x3f];
                fval |= SP3[(work >> 16) & 0x3f];
                fval |= SP1[(work >> 24) & 0x3f];
                //work = right ^ *keys++;
                work = right ^ keys.Now; keys++;
                fval |= SP8[work & 0x3f];
                fval |= SP6[(work >> 8) & 0x3f];
                fval |= SP4[(work >> 16) & 0x3f];
                fval |= SP2[(work >> 24) & 0x3f];
                leftt ^= fval;
                work = (leftt << 28) | (leftt >> 4);
                //work ^= *keys++;
                work ^= keys.Now; keys++;
                fval = SP7[work & 0x3f];
                fval |= SP5[(work >> 8) & 0x3f];
                fval |= SP3[(work >> 16) & 0x3f];
                fval |= SP1[(work >> 24) & 0x3f];
                //work = leftt ^ *keys++;
                work = leftt ^ keys.Now; keys++;

                fval |= SP8[work & 0x3f];
                fval |= SP6[(work >> 8) & 0x3f];
                fval |= SP4[(work >> 16) & 0x3f];
                fval |= SP2[(work >> 24) & 0x3f];
                right ^= fval;
            }
            right = (right << 31) | (right >> 1);
            work = (leftt ^ right) & 0xaaaaaaaa;
            leftt ^= work;
            right ^= work;
            leftt = (leftt << 31) | (leftt >> 1);
            work = ((leftt >> 8) ^ right) & 0x00ff00ff;
            right ^= work;
            leftt ^= (work << 8);
            work = ((leftt >> 2) ^ right) & 0x33333333;
            right ^= work;
            leftt ^= (work << 2);
            work = ((right >> 16) ^ leftt) & 0x0000ffff;
            leftt ^= work;
            right ^= (work << 16);
            work = ((right >> 4) ^ leftt) & 0x0f0f0f0f;
            leftt ^= work;
            right ^= (work << 4);
            //*block++ = right;
            block.Now = right; block++;
            //*block = leftt;
            block.Now = leftt;
            return;

        }

    }
}
